home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2005 March
/
CMCD0305.ISO
/
Software
/
Shareware
/
Grafica
/
falbum
/
fasetup101.exe
/
{app}
/
falbum.exe
/
0
/
RCDATA
/
TFORM5
/
TFORM5.txt
Wrap
Text File
|
2004-10-23
|
9KB
|
370 lines
object Form5: TForm5
Left = 342
Top = 193
BorderStyle = bsDialog
Caption = 'Add images'
ClientHeight = 369
ClientWidth = 356
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
Position = poDesktopCenter
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Button1: TButton
Left = 45
Top = 333
Width = 75
Height = 25
Caption = 'Start'
Default = True
Enabled = False
ModalResult = 1
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 225
Top = 333
Width = 75
Height = 25
Cancel = True
Caption = 'Cancel'
ModalResult = 2
TabOrder = 1
end
object PageControl1: TPageControl
Left = 8
Top = 8
Width = 337
Height = 313
ActivePage = TabSheet1
TabOrder = 2
object TabSheet1: TTabSheet
Caption = 'Basic'
object Label2: TLabel
Left = 13
Top = 11
Width = 69
Height = 13
Caption = 'Selected path:'
end
object Label4: TLabel
Left = 14
Top = 196
Width = 82
Height = 13
Caption = 'Compress quality:'
end
object Label5: TLabel
Left = 104
Top = 196
Width = 15
Height = 13
Caption = '40'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Edit1: TEdit
Left = 16
Top = 31
Width = 265
Height = 21
TabOrder = 0
OnChange = Edit1Change
end
object Button3: TButton
Left = 291
Top = 30
Width = 22
Height = 22
Caption = '...'
TabOrder = 1
OnClick = Button3Click
end
object TrackBar1: TTrackBar
Left = 8
Top = 209
Width = 305
Height = 38
Max = 100
Min = 10
Frequency = 10
Position = 40
TabOrder = 2
ThumbLength = 15
TickMarks = tmBoth
OnChange = TrackBar1Change
end
object ReplacePathCheck: TCheckBox
Left = 15
Top = 254
Width = 97
Height = 17
Caption = 'Replace path'
Checked = True
State = cbChecked
TabOrder = 3
end
object RescanImagesCheck: TCheckBox
Left = 143
Top = 255
Width = 97
Height = 17
Caption = 'Rescan images'
TabOrder = 4
end
object GroupBox1: TGroupBox
Left = 8
Top = 64
Width = 313
Height = 121
Caption = ' Sample size mode '
TabOrder = 5
object Label3: TLabel
Left = 136
Top = 56
Width = 14
Height = 13
Caption = 'W:'
end
object Label6: TLabel
Left = 224
Top = 56
Width = 11
Height = 13
Caption = 'H:'
end
object Label1: TLabel
Left = 224
Top = 88
Width = 11
Height = 13
Caption = 'H:'
end
object Label7: TLabel
Left = 136
Top = 88
Width = 14
Height = 13
Caption = 'W:'
end
object rbSampleSizeLongSide: TRadioButton
Left = 8
Top = 24
Width = 137
Height = 17
Caption = 'Length of longer side:'
TabOrder = 0
end
object SizeEdit: TEdit
Left = 160
Top = 20
Width = 57
Height = 21
TabOrder = 1
Text = '640'
end
object rbSampleSizeFixed: TRadioButton
Left = 8
Top = 54
Width = 113
Height = 17
Caption = 'Fixed demensions: '
TabOrder = 2
end
object eFixedWidth: TEdit
Left = 160
Top = 52
Width = 57
Height = 21
TabOrder = 3
Text = '640'
end
object eFixedHeight: TEdit
Left = 240
Top = 52
Width = 57
Height = 21
TabOrder = 4
Text = '480'
end
object rbSampleSizeFlex: TRadioButton
Left = 8
Top = 88
Width = 121
Height = 15
Caption = 'Keep square as for:'
Checked = True
TabOrder = 5
TabStop = True
WordWrap = True
end
object eFlexWidth: TEdit
Left = 160
Top = 84
Width = 57
Height = 21
TabOrder = 6
Text = '640'
end
object eFlexHeight: TEdit
Left = 240
Top = 84
Width = 57
Height = 21
TabOrder = 7
Text = '480'
end
end
end
object TabSheet4: TTabSheet
Caption = 'Processed images'
ImageIndex = 3
object clbProcessed: TCheckListBox
Left = 16
Top = 8
Width = 297
Height = 265
ItemHeight = 13
Items.Strings = (
'JPEG images (*.jpg, *.jpeg)'
'Windows bitmap (*.bmp)'
'TIFF images (*.tif, *.tiff)'
'GFI fax images (*.fax)'
'SGI images (*.bw, *.rgb, *.rgba, *.sgi)'
'Autodesk images files (*.cel, *.pic)'
'Truevision images (*.tga; *.vst, *.icb, *.vda, *.win)'
'ZSoft Paintbrush images (*.pcx, *.pcc)'
'Word 5.x screen capture files (*.scr)'
'Kodak Photo-CD images (*.pcd)'
'Dr. Halo images (*.cut, *.pal)'
'CompuServe images (*.gif)'
'SGI Wavefront images (*.rla, *.rpf)'
'Photoshop images (*.psd, *.pdd)'
'Paintshop Pro images (*.psp)'
'Portable network graphic images (*.png)'
'QuickTime movie (*.mov)')
TabOrder = 0
end
end
object TabSheet3: TTabSheet
Caption = 'Additional files'
ImageIndex = 2
object rgAdditType: TRadioGroup
Left = 8
Top = 8
Width = 313
Height = 89
Caption = ' Mode '
Color = clBtnFace
ItemIndex = 0
Items.Strings = (
'None'
'All files'
'Selected by mask')
ParentColor = False
TabOrder = 0
end
object GroupBox2: TGroupBox
Left = 8
Top = 104
Width = 313
Height = 169
Caption = ' Masks definitions '
TabOrder = 1
object eAddExt: TEdit
Left = 8
Top = 20
Width = 233
Height = 21
TabOrder = 0
OnChange = eAddExtChange
end
object btAdd: TButton
Left = 248
Top = 16
Width = 49
Height = 25
Caption = 'Add'
TabOrder = 1
OnClick = btAddClick
end
object lvExt: TListView
Left = 8
Top = 48
Width = 289
Height = 81
Columns = <
item
Width = 200
end
item
Width = 80
end>
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
HideSelection = False
RowSelect = True
ParentFont = False
ShowColumnHeaders = False
SmallImages = ImageList1
TabOrder = 2
ViewStyle = vsReport
OnClick = lvExtClick
OnCustomDrawSubItem = lvExtCustomDrawSubItem
OnEdited = lvExtEdited
end
object btEdit: TButton
Left = 56
Top = 136
Width = 81
Height = 25
Caption = 'Edit'
TabOrder = 3
OnClick = btEditClick
end
object btDelete: TButton
Left = 160
Top = 136
Width = 73
Height = 25
Caption = 'Delete'
TabOrder = 4
OnClick = btDeleteClick
end
end
end
end
object btSaveOptions: TButton
Left = 136
Top = 333
Width = 75
Height = 25
Caption = 'Save options'
TabOrder = 3
OnClick = btSaveOptionsClick
end
object PBFolderDialog1: TPBFolderDialog
Flags = [OnlyFileSystem, ShowPath, NewDialogStyle, HideNewFolderButton, ShowShared]
Left = 232
end
object ImageList1: TImageList
BkColor = clWhite
Left = 260
end
end